(mutually_exclusive_p): In 'case wordbeg', compare op2

against proper opcode.

diff --git a/src/regex.c b/src/regex.c
index a145183510d362eb1dc2f5d4056bab244507206a..a518ef81a0c865eb8c04babd8028382473de0a1d 100644 (file)
--- a/src/regex.c
+++ b/src/regex.c
@@ -4661,7 +4661,7 @@ mutually_exclusive_p (bufp, p1, p2)
     case wordbeg:
     case syntaxspec:
       return ((re_opcode_t) *p1 == notsyntaxspec
-             && p1[1] == (op2 == wordend ? Sword : p2[1]));
+             && p1[1] == (op2 == wordbeg ? Sword : p2[1]));
 
     case wordbound:
       return (((re_opcode_t) *p1 == notsyntaxspec